home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ Win2K TCPIP Sec 4.xpl < prev    next >
Text File  |  2002-03-10  |  2KB  |  54 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="2"
  3. "COUNT"="1"
  4. "UIPATH"="Network\TCP/IP Hardening
  5. "NAME"="Keep Alive Time"
  6. "OSVERSION"="0001011"
  7. "WARNING"="1"
  8. "VERSION"="1.01"
  9. "LANGUAGE"="VBScript"
  10. "TEXT 1"="Time (s)"
  11. "DESCRIPTION 1"="Especially if this computer is used as an HTTP/1.1 server, many clients will request an keep alive connection."
  12. "DESCRIPTION 2"="This setting controls how often the server should check if an idle connection is still "alive" by sending a single TCP/IP packet to the client."
  13. "DESCRIPTION 3"="If the client does not react on this keep alive packet, the keep alive connection is freed and thus freeing resources."
  14. "DESCRIPTION 4"="The default value is 7200 seconds (two hours), a good value is 600 seconds(10 minutes)."
  15. "DESCRIPTION 5"="To restore the system default value, clear the field."
  16. "DESCRIPTION 6"="For more information about TCP/IP Hardening, see http://www.winnetmag.com/articles/index.cfm?articleid=23918"
  17. "AUTHOR"="Xteq Systems"
  18. "CONTACTURL"="http://www.xteq.com/"
  19. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  20. "COMMENT 1"=" "
  21.  
  22.  
  23. sP="HKLM\System\CurrentControlSet\Services\TcpIp\Parameters\KeepAliveTime"
  24.  
  25. Sub Plugin_Initialize 
  26.  if RegValueExists(sP) then
  27.     s=RegReadValue(sP)
  28.     if IsNumeric(s) then
  29.        i=s/1000
  30.        SetUIElement 1,i
  31.     end if
  32.  end if
  33. End Sub
  34.  
  35. Sub Plugin_CheckData(ElementIndex)
  36. End Sub
  37.  
  38. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  39.  s=GetUIElement(1)
  40.  if len(s)=0 then
  41.     If RegValueExists(sP) then RegDeleteValue(sP)
  42.  else
  43.     i=s*1000
  44.     Call RegWriteValue(sP,i,2)
  45.  end if
  46.  
  47.  
  48.  Call Restart()
  49. End Sub
  50.  
  51. Sub Plugin_Terminate 
  52. End Sub
  53.  
  54.